www.gusucode.com > (粗糙集数据分析工具箱) matlab源码程序 > matlab代做 修改 程序工具箱 (粗糙集数据分析工具箱) matla 中使用/rsda/supc.m
function b=supc(c,x) [pm,pn]=size(c); %x=cat(2,x,0); b=[]; d=[0]; for i=1:pm [q,w]=size(intersect(c(i,:),x)); if w~=0 b=cat(2,b,c(i,:)); end end bb=unique(b); b=setdiff(bb,0);